Private Sub Workbook_WindowActivate(ByVal Wn As Window)

    ActiveWindow.DisplayZeros = False

End Sub